home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
United Public Domain Gold 2
/
United Public Domain Gold 2.iso
/
utilities
/
pu745.dms
/
pu745.adf
/
GLOBE099.LHA
/
Ami-Globe
/
fichier.c
< prev
next >
Wrap
C/C++ Source or Header
|
1994-11-17
|
3KB
|
96 lines
/****************************************************************/
/* */
/* fichier : fichier.c */
/* projet : Amiglobe */
/* date création: mars 1994 */
/* commentaire : fonctions d'accès aux fichiers */
/* révision : $VER: fichier.c 0.002 (04 Oct 1994) */
/* copyright : © 1994 Olivier Collard */
/* $HISTORY: */
/* */
/* mars 1994 : 0.01 : version initiale, projet */
/* Shannon-Fano */
/* 4 oct 1994 : 0.002 : version initiale, projet */
/* Amiglobe */
/* */
/****************************************************************/
/* includes spécifiques pour Amiga: */
#include <dos/dosasl.h> /* gestion des jokers */
#include <clib/dos_protos.h> /* gestion des jokers */
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include "fichier.h"
/* -------------------------- ouvrir_nouveau_fichier ---------------------------
Comment: a chaque appel, donne un pointeur sur un fichier
correspondant à nom
si nom change, reprise depuis le début
*/
char *
ouvrir_nouveau_fichier(char * nom)
// fonction specifique a chaque systeme (noms)
{
static struct AnchorPath __aligned * anchor=NULL;
// spécifique AmigaDOS: contient le 'pattern' à mettre en
// correspondance avec les noms de fichiers
// vaut NULL au premier appel
/*char nom_fichier [32];*/
/*FILE * fichier=NULL; */
static char * pattern="";
// pattern de recherche; s'il est different de nom,
// il faut recommencer la recherche
if (strcmp(pattern,nom)!=0)
{
anchor=NULL;
free(pattern);
pattern=strdup(nom);
}
if (anchor==NULL)
{
// initialisation de anchor lors du premier appel
anchor = (struct AnchorPath __aligned *)malloc
(sizeof(struct AnchorPath ));
memset(anchor,0,sizeof(struct AnchorPath));
// dans le cas du premier appel
if (MatchFirst(pattern,anchor)!=0)
{
/*printf("Erreur dans la recherche du fichier\n");*/
return NULL;
}
/*printf("trouve:%s\n",(anchor->ap_Info).fib_FileName);*/
// recherche d'un fichier
return (anchor->ap_Info).fib_FileName;
}
else
{
// recherche d'autres fichiers
if (MatchNext(anchor)!=0)
{
/*printf("pas d'autres fichiers trouves\n");*/
// si ne trouve plus d'autres fichiers,
// positions_nom[i] vaut "" et positions[i] vaut
// la position de fin du dernier fichier
MatchEnd(anchor);
// fermeture de anchor
return NULL;
}
else
{
/*printf("trouve:%s\n",(anchor->ap_Info).fib_FileName);*/
return (anchor->ap_Info).fib_FileName;
}
}
}